home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
AmigActive 10
/
AACD 10.iso
/
AACD
/
Games
/
MAME
/
src
/
vidhrdw
/
madmotor.c
< prev
next >
Wrap
C/C++ Source or Header
|
2000-04-04
|
9KB
|
342 lines
/***************************************************************************
Mad Motor video emulation - Bryan McPhail, mish@tendril.co.uk
Notes: Playfield 3 can change size between 512x1024 and 2048x256
***************************************************************************/
#include "driver.h"
#include "vidhrdw/generic.h"
unsigned char *madmotor_pf1_rowscroll;
unsigned char *madmotor_pf1_data,*madmotor_pf2_data,*madmotor_pf3_data;
static unsigned char madmotor_pf1_control[32];
static unsigned char madmotor_pf2_control[32];
static unsigned char madmotor_pf3_control[32];
static int flipscreen;
static struct tilemap *madmotor_pf1_tilemap,*madmotor_pf2_tilemap,*madmotor_pf3_tilemap,*madmotor_pf3a_tilemap;
/* 512 by 512 playfield, 8 by 8 tiles */
static UINT32 pf1_scan(UINT32 col,UINT32 row,UINT32 num_cols,UINT32 num_rows)
{
/* logical (col,row) -> memory offset */
return (col & 0x1f) + ((row & 0x1f) << 5) + ((row & 0x20) << 5) + ((col & 0x20) << 6);
}
static void get_pf1_tile_info(int tile_index)
{
int tile,color;
tile=READ_WORD(&madmotor_pf1_data[2*tile_index]);
color=tile >> 12;
tile=tile&0xfff;
SET_TILE_INFO(0,tile,color)
}
/* 512 by 512 playfield, 16 by 16 tiles */
static UINT32 pf2_scan(UINT32 col,UINT32 row,UINT32 num_cols,UINT32 num_rows)
{
/* logical (col,row) -> memory offset */
return (col & 0x0f) + ((row & 0x0f) << 4) + ((row & 0x10) << 4) + ((col & 0x10) << 5);
}
static void get_pf2_tile_info(int tile_index)
{
int tile,color;
tile=READ_WORD(&madmotor_pf2_data[2*tile_index]);
color=tile >> 12;
tile=tile&0xfff;
SET_TILE_INFO(1,tile,color)
}
/* 512 by 1024 playfield, 16 by 16 tiles */
static UINT32 pf3_scan(UINT32 col,UINT32 row,UINT32 num_cols,UINT32 num_rows)
{
/* logical (col,row) -> memory offset */
return (col & 0x0f) + ((row & 0x0f) << 4) + ((row & 0x30) << 4) + ((col & 0x10) << 6);
}
static void get_pf3_tile_info(int tile_index)
{
int tile,color;
tile=READ_WORD(&madmotor_pf3_data[2*tile_index]);
color=tile >> 12;
tile=tile&0xfff;
SET_TILE_INFO(2,tile,color)
}
/* 2048 by 256 playfield, 16 by 16 tiles */
static UINT32 pf3a_scan(UINT32 col,UINT32 row,UINT32 num_cols,UINT32 num_rows)
{
/* logical (col,row) -> memory offset */
return (col & 0x0f) + ((row & 0x0f) << 4) + ((col & 0x70) << 4);
}
static void get_pf3a_tile_info(int tile_index)
{
int tile,color;
tile=READ_WORD(&madmotor_pf3_data[2*tile_index]);
color=tile >> 12;
tile=tile&0xfff;
SET_TILE_INFO(2,tile,color)
}
/******************************************************************************/
int madmotor_vh_start(void)
{
madmotor_pf1_tilemap = tilemap_create(get_pf1_tile_info, pf1_scan, TILEMAP_TRANSPARENT, 8, 8, 64,64);
madmotor_pf2_tilemap = tilemap_create(get_pf2_tile_info, pf2_scan, TILEMAP_TRANSPARENT,16,16, 32,32);
madmotor_pf3_tilemap = tilemap_create(get_pf3_tile_info, pf3_scan, TILEMAP_OPAQUE, 16,16, 32,64);
madmotor_pf3a_tilemap= tilemap_create(get_pf3a_tile_info,pf3a_scan,TILEMAP_OPAQUE, 16,16,128,16);
if (!madmotor_pf1_tilemap || !madmotor_pf2_tilemap || !madmotor_pf3_tilemap || !madmotor_pf3a_tilemap)
return 1;
madmotor_pf1_tilemap->transparent_pen = 0;
madmotor_pf2_tilemap->transparent_pen = 0;
tilemap_set_scroll_rows(madmotor_pf1_tilemap,512);
return 0;
}
/******************************************************************************/
READ_HANDLER( madmotor_pf1_data_r )
{
return READ_WORD(&madmotor_pf1_data[offset]);
}
READ_HANDLER( madmotor_pf2_data_r )
{
return READ_WORD(&madmotor_pf2_data[offset]);
}
READ_HANDLER( madmotor_pf3_data_r )
{
return READ_WORD(&madmotor_pf3_data[offset]);
}
WRITE_HANDLER( madmotor_pf1_data_w )
{
COMBINE_WORD_MEM(&madmotor_pf1_data[offset],data);
tilemap_mark_tile_dirty(madmotor_pf1_tilemap,offset/2);
}
WRITE_HANDLER( madmotor_pf2_data_w )
{
COMBINE_WORD_MEM(&madmotor_pf2_data[offset],data);
tilemap_mark_tile_dirty(madmotor_pf2_tilemap,offset/2);
}
WRITE_HANDLER( madmotor_pf3_data_w )
{
COMBINE_WORD_MEM(&madmotor_pf3_data[offset],data);
/* Mark the dirty position on the 512 x 1024 version */
tilemap_mark_tile_dirty(madmotor_pf3_tilemap,offset/2);
/* Mark the dirty position on the 2048 x 256 version */
tilemap_mark_tile_dirty(madmotor_pf3_tilemap,offset/2);
}
WRITE_HANDLER( madmotor_pf1_control_w )
{
COMBINE_WORD_MEM(&madmotor_pf1_control[offset],data);
}
WRITE_HANDLER( madmotor_pf2_control_w )
{
COMBINE_WORD_MEM(&madmotor_pf2_control[offset],data);
}
WRITE_HANDLER( madmotor_pf3_control_w )
{
COMBINE_WORD_MEM(&madmotor_pf3_control[offset],data);
}
READ_HANDLER( madmotor_pf1_rowscroll_r )
{
return READ_WORD(&madmotor_pf1_rowscroll[offset]);
}
WRITE_HANDLER( madmotor_pf1_rowscroll_w )
{
COMBINE_WORD_MEM(&madmotor_pf1_rowscroll[offset],data);
}
/******************************************************************************/
static void madmotor_mark_sprite_colours(void)
{
int offs,color,i,pal_base;
int colmask[16];
palette_init_used_colors();
/* Sprites */
pal_base = Machine->drv->gfxdecodeinfo[3].color_codes_start;
for (color = 0;color < 16;color++) colmask[color] = 0;
for (offs = 0;offs < 0x800;offs += 8)
{
int x,y,sprite,multi;
y = READ_WORD(&spriteram[offs]);
if ((y&0x8000) == 0) continue;
x = READ_WORD(&spriteram[offs+4]);
color = (x & 0xf000) >> 12;
multi = (1 << ((y & 0x1800) >> 11)) - 1; /* 1x, 2x, 4x, 8x height */
/* multi = 0 1 3 7 */
x = x & 0x01ff;
if (x >= 256) x -= 512;
x = 240 - x;
if (x>256) continue; /* Speedup + save colours */
sprite = READ_WORD (&spriteram[offs+2]) & 0x1fff;
sprite &= ~multi;
while (multi >= 0)
{
colmask[color] |= Machine->gfx[3]->pen_usage[sprite + multi];
multi--;
}
}
for (color = 0;color < 16;color++)
{
for (i = 1;i < 16;i++)
{
if (colmask[color] & (1 << i))
palette_used_colors[pal_base + 16 * color + i] = PALETTE_COLOR_USED;
}
}
}
static void dec0_drawsprites(struct osd_bitmap *bitmap,int pri_mask,int pri_val)
{
int offs;
for (offs = 0;offs < 0x800;offs += 8)
{
int x,y,sprite,colour,multi,fx,fy,inc,flash,mult;
y = READ_WORD(&spriteram[offs]);
if ((y&0x8000) == 0) continue;
x = READ_WORD(&spriteram[offs+4]);
colour = x >> 12;
if ((colour & pri_mask) != pri_val) continue;
flash=x&0x800;
if (flash && (cpu_getcurrentframe() & 1)) continue;
fx = y & 0x2000;
fy = y & 0x4000;
multi = (1 << ((y & 0x1800) >> 11)) - 1; /* 1x, 2x, 4x, 8x height */
/* multi = 0 1 3 7 */
sprite = READ_WORD (&spriteram[offs+2]) & 0x1fff;
x = x & 0x01ff;
y = y & 0x01ff;
if (x >= 256) x -= 512;
if (y >= 256) y -= 512;
x = 240 - x;
y = 240 - y;
if (x>256) continue; /* Speedup */
sprite &= ~multi;
if (fy)
inc = -1;
else
{
sprite += multi;
inc = 1;
}
if (flipscreen) {
y=240-y;
x=240-x;
if (fx) fx=0; else fx=1;
if (fy) fy=0; else fy=1;
mult=16;
}
else mult=-16;
while (multi >= 0)
{
drawgfx(bitmap,Machine->gfx[3],
sprite - multi * inc,
colour,
fx,fy,
x,y + mult * multi,
&Machine->drv->visible_area,TRANSPARENCY_PEN,0);
multi--;
}
}
}
/******************************************************************************/
void madmotor_vh_screenrefresh(struct osd_bitmap *bitmap,int full_refresh)
{
int offs;
/* Update flipscreen */
if (READ_WORD(&madmotor_pf1_control[0])&0x80)
flipscreen=1;
else
flipscreen=0;
tilemap_set_flip(ALL_TILEMAPS,flipscreen ? (TILEMAP_FLIPY | TILEMAP_FLIPX) : 0);
/* Setup scroll registers */
for (offs = 0;offs < 512;offs++)
tilemap_set_scrollx( madmotor_pf1_tilemap,offs, READ_WORD(&madmotor_pf1_control[0x10]) + READ_WORD(&madmotor_pf1_rowscroll[0x400+2*offs]) );
tilemap_set_scrolly( madmotor_pf1_tilemap,0, READ_WORD(&madmotor_pf1_control[0x12]) );
tilemap_set_scrollx( madmotor_pf2_tilemap,0, READ_WORD(&madmotor_pf2_control[0x10]) );
tilemap_set_scrolly( madmotor_pf2_tilemap,0, READ_WORD(&madmotor_pf2_control[0x12]) );
tilemap_set_scrollx( madmotor_pf3_tilemap,0, READ_WORD(&madmotor_pf3_control[0x10]) );
tilemap_set_scrolly( madmotor_pf3_tilemap,0, READ_WORD(&madmotor_pf3_control[0x12]) );
tilemap_set_scrollx( madmotor_pf3a_tilemap,0, READ_WORD(&madmotor_pf3_control[0x10]) );
tilemap_set_scrolly( madmotor_pf3a_tilemap,0, READ_WORD(&madmotor_pf3_control[0x12]) );
tilemap_update(madmotor_pf1_tilemap);
tilemap_update(madmotor_pf2_tilemap);
tilemap_update(madmotor_pf3_tilemap);
tilemap_update(madmotor_pf3a_tilemap);
madmotor_mark_sprite_colours();
if (palette_recalc())
tilemap_mark_all_pixels_dirty(ALL_TILEMAPS);
/* Draw playfields & sprites */
tilemap_render(ALL_TILEMAPS);
if (READ_WORD(&madmotor_pf3_control[0x6])==2)
tilemap_draw(bitmap,madmotor_pf3_tilemap,0);
else
tilemap_draw(bitmap,madmotor_pf3a_tilemap,0);
tilemap_draw(bitmap,madmotor_pf2_tilemap,0);
dec0_drawsprites(bitmap,0x00,0x00);
tilemap_draw(bitmap,madmotor_pf1_tilemap,0);
}